C------------------------------------------ VISCOSITY OF AIR -----HOT
      DATA (VIS(N,3),N=1,50)
     & /1.0600D-04, 1.3540D-04, 1.6480D-04, 1.9420D-04, 2.2360D-04,
     &  2.5300D-04, 2.8240D-04, 3.1180D-04, 3.4120D-04, 3.7060D-04,
     &  4.0000D-04, 4.2600D-04, 4.5200D-04, 4.7800D-04, 5.0400D-04,
     &  5.3000D-04, 5.5600D-04, 5.8200D-04, 6.0800D-04, 6.3400D-04,
     &  6.6000D-04, 6.8200D-04, 7.0400D-04, 7.2600D-04, 7.4800D-04,
     &  7.7000D-04, 7.9200D-04, 8.1400D-04, 8.3600D-04, 8.5800D-04,
     &  8.8000D-04, 8.9800D-04, 9.1600D-04, 9.3400D-04, 9.5200D-04,
     &  9.7000D-04, 9.8800D-04, 1.0060D-03, 1.0240D-03, 1.0420D-03,
     &  1.0600D-03, 1.0840D-03, 1.1080D-03, 1.1320D-03, 1.1560D-03,
     &  1.1800D-03, 1.2040D-03, 1.2280D-03, 1.2520D-03, 1.2760D-03/
      DATA (VIS(N,3),N=51,100)
     & /1.3000D-03, 1.3340D-03, 1.3680D-03, 1.4020D-03, 1.4360D-03,
     &  1.4700D-03, 1.5040D-03, 1.5380D-03, 1.5720D-03, 1.6060D-03,
     &  1.6400D-03, 1.6760D-03, 1.7120D-03, 1.7480D-03, 1.7840D-03,
     &  1.8200D-03, 1.8560D-03, 1.8920D-03, 1.9280D-03, 1.9640D-03,
     &  2.0000D-03, 2.0300D-03, 2.0600D-03, 2.0900D-03, 2.1200D-03,
     &  2.1500D-03, 2.1800D-03, 2.2100D-03, 2.2400D-03, 2.2700D-03,
     &  2.3000D-03, 2.3260D-03, 2.3520D-03, 2.3780D-03, 2.4040D-03,
     &  2.4300D-03, 2.4560D-03, 2.4820D-03, 2.5080D-03, 2.5340D-03,
     &  2.5600D-03, 2.5720D-03, 2.5840D-03, 2.5960D-03, 2.6080D-03,
     &  2.6200D-03, 2.6320D-03, 2.6440D-03, 2.6560D-03, 2.6680D-03/
      DATA (VIS(N,3),N=101,150)
     & /2.6800D-03, 2.6760D-03, 2.6720D-03, 2.6680D-03, 2.6640D-03,
     &  2.6600D-03, 2.6560D-03, 2.6520D-03, 2.6480D-03, 2.6440D-03,
     &  2.6400D-03, 2.6240D-03, 2.6080D-03, 2.5920D-03, 2.5760D-03,
     &  2.5600D-03, 2.5440D-03, 2.5280D-03, 2.5120D-03, 2.4960D-03,
     &  2.4800D-03, 2.4500D-03, 2.4200D-03, 2.3900D-03, 2.3600D-03,
     &  2.3300D-03, 2.3000D-03, 2.2700D-03, 2.2400D-03, 2.2100D-03,
     &  2.1800D-03, 2.1380D-03, 2.0960D-03, 2.0540D-03, 2.0120D-03,
     &  1.9700D-03, 1.9280D-03, 1.8860D-03, 1.8440D-03, 1.8020D-03,
     &  1.7600D-03, 1.7060D-03, 1.6520D-03, 1.5980D-03, 1.5440D-03,
     &  1.4900D-03, 1.4360D-03, 1.3820D-03, 1.3280D-03, 1.2740D-03/
      DATA (VIS(N,3),N=151,201)
     & /1.2200D-03, 1.1540D-03, 1.0880D-03, 1.0220D-03, 9.5600D-04,
     &  8.9000D-04, 8.2400D-04, 7.5800D-04, 6.9200D-04, 6.2600D-04,
     &  5.6000D-04, 5.3090D-04, 5.0180D-04, 4.7270D-04, 4.4360D-04,
     &  4.1450D-04, 3.8540D-04, 3.5630D-04, 3.2720D-04, 2.9810D-04,
     &  2.6900D-04, 2.6230D-04, 2.5560D-04, 2.4890D-04, 2.4220D-04,
     &  2.3550D-04, 2.2880D-04, 2.2210D-04, 2.1540D-04, 2.0870D-04,
     &  2.0200D-04, 1.9860D-04, 1.9520D-04, 1.9180D-04, 1.8840D-04,
     &  1.8500D-04, 1.8160D-04, 1.7820D-04, 1.7480D-04, 1.7140D-04,
     &  1.6800D-04, 1.6650D-04, 1.6500D-04, 1.6350D-04, 1.6200D-04,
     &  1.6050D-04, 1.5900D-04, 1.5750D-04, 1.5600D-04, 1.5450D-04,
     &  1.5300D-04/
